home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 26
/
Cream of the Crop 26.iso
/
bbs
/
mxgui203.zip
/
GUI_ANSI.TXT
< prev
next >
Wrap
Text File
|
1997-08-11
|
2KB
|
45 lines
{
───────────────────────────────────────────────────────────────────────────────
▀▀▀ ▀▀▀ ▀▀▀▀▀ ▀▀ ▀▀
▀▀▀▀ ▀▀▀▀ ▀▀ ▀▀ ▀▀ ▀▀
▀▀ ▀▀▀ ▀▀ ▀▀▀▀▀▀▀ ▀▀▀ ╔══ ╦═╗ ╔═╗ ╦═╗ ╦ ╦ ╦ ╔═╗ ╔═╗
▀▀ ▀ ▀▀ ▀▀ ▀▀ ▀▀ ▀▀ ║ ╦ ╠╦╝ ╠═╣ ╠═╝ ╠═╣ ║ ║ ╚═╗
▀▀ ▀▀ ▀▀ ▀▀ ▀▀ ▀▀ ╚═╝ ╩╚═ ╩ ╩ ╩ ╩ ╩ ╩ ╚═╝ ╚═╝
───────────────────────────────────────────────────────────────────────────────
The MAX Graphics GUI Kit is Copyright 1995-Current Larry L. Athey (LA-Soft).
Color Averaging procedures are courtesy of Sean Price (Rude Dog Software).
───────────────────────────────────────────────────────────────────────────────}
INTERFACE
PROCEDURE Display_ANSI(Ch : CHAR);
{^ Processes a character from an ANSI or ASCII text string. }
PROCEDURE Display_ANSIstr(S : STRING);
{^ Processes an entire ANSI or ASCII text string. }
PROCEDURE Goto_XY(X1,Y1 : BYTE);
{^ Equivalent to GotoXY in text mode. }
PROCEDURE Clr_Scr;
{^ Equivalent to ClrScr in text mode. }
PROCEDURE Clr_Eol;
{^ Equivalent to ClrEol in text mode. }
PROCEDURE PlaceCursor;
{^ Plots a bogus cursor on the screen (for visual reference only). }
PROCEDURE EraseCursor;
{^ Erases the bogus cursor. }
PROCEDURE ResetANSI;
{^ Resets all variables in this unit. }
VAR
RowLimit : BYTE; {Maximum number of text rows to display. }
ColLimit : BYTE; {Maximum number of text columns to display. }
StartX : INTEGER; {ANSI window upper left X SVGA coordinate. }
StartY : INTEGER; {ANSI window upper left Y SVGA coordinate. }
Where_X : BYTE; {Equivalent to WhereY in text mode. }
Where_Y : BYTE; {Equivalent to WhereX in text mode. }
ANSI_FG : INTEGER; {Stores current foreground color. }
ANSI_BG : INTEGER; {Stores current background color. }
CursorOn : BOOLEAN; {Is the simulated ANSI cursor on? }
HandleMouse : BOOLEAN; {Turn the mouse cursor on/off automatically? [Y/N] }
{──────────────────────────────────────────────────────────────────────────────}